home *** CD-ROM | disk | FTP | other *** search
/ Magic Disk 64 / Magic_Disk_64_91-02_1991_-_de_Side_B.d64 / font hoch_breit (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  223b  |  12 lines
  1. 60200 poke211,x:poke214,y:sys58640:iflen(a$)=0thenreturn
  2. 60205 print"[146]";
  3. 60210 forqu=1tolen(a$)
  4. 60215 b$=mid$(a$,qu,1)
  5. 60220 printb$;chr$(128+asc(b$));
  6. 60225 next
  7. 60230 poke211,x:poke214,y+1:sys58640:print"";
  8. 60235 forqu=1tolen(a$)
  9. 60240 b$=mid$(a$,qu,1)
  10. 60245 printb$;chr$(128+asc(b$));
  11. 60250 next:print"[146]";:return
  12.